home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ozsi 9
/
Ozsi_09_1998_Tide_Side_A.d64
/
scrn clear 7_rtn
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
435b
|
16 lines
1 rem"[141][147][158]tomz/tide/tdr
2 [143]*screen clear module 7.
20 [131]"press da long 1. to screen clear no.07."
30 [151]53280,0:[151]53281,0
40 [153] [199](147);
50 [135]a$:[129]t[178]0[164]23
60 [153]a$;:[130]
70 [129]t[178]55296[164]56296:[151]t,[181]([187](0)[172]15)[170]1:[130]
80 [151]198,0:[146]198,1
90 [143] *base/main rtns here!*
100 b$[178]" ":c$[178]b$:a$[178][199](19)
110 [129]i[178]1[164]23:c$[178]c$[170][199](157)[170][199](17)[170]b$:[130]:c$[178]c$[170]a$
120 [129]i[178]0[164]12:[153]a$;[163]i)c$:[151]781,i:[158]59903
130 [153]a$;[163]39[171]i)c$:[151]781,24[171]i:[158]59903:[130]:[153]a$
200 [151]2020,20:[151]2021,9:[151]2022,4:[151]2023,5